home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 1 / Meeting Pearls Vol 1 (1994).iso / installed_progs / gfx / lise2.1 / lise / src / rmtek.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-03-31  |  374 b   |  35 lines
  1. #include <stdio.h>
  2. #ifdef AMIGA
  3. #include <gfxamiga.h>
  4. #else
  5. #include <gfx.h>
  6. #endif
  7.  
  8. help()
  9. {
  10. printf("remove tektronix window\n");
  11. }
  12.  
  13. main(argc,argv)
  14. int argc;
  15. char *argv[];
  16. {
  17. int n;
  18. char z[80];
  19.  
  20. n=checkopt(argc,argv,"-dummy",z);
  21. tekopen();
  22. dperas();
  23. #ifdef UNIX
  24. gfxbufin(0x1b);
  25. gfxbufin(0x40);
  26. gfxflush();
  27. #endif
  28. #ifdef AMIGA
  29. rmtek();
  30. #endif
  31. close(_tek4014);
  32. return(0);
  33. }
  34.  
  35.